Partial Public Class pages_ProductTypes_default : Inherits CPage


#Region "Data"
    Public ReadOnly Property [ProductTypes]() As CProductTypeList
        Get
            Return CProductType.Cache
        End Get
    End Property
#End Region

#Region "Event Handlers - Page"
    Protected Overrides Sub PageInit()
        'Populate Dropdowns
    
        'Search state (from querystring)
        
        'Display Results
        ctrlProductTypes.Display(Me.ProductTypes)
    End Sub
#End Region

#Region "Event Handlers - Form"
#End Region

#Region "Event Handlers - UserControl"
    Private Sub ctrl_AddClick() Handles ctrlProductTypes.AddClick
        Response.Redirect(CSitemap.ProductTypeAdd())
    End Sub
    Private Sub ctrl_ResortClick(ByVal sortBy As String, ByVal descending As Boolean, ByVal pageNumber As Integer) Handles ctrlProductTypes.ResortClick
        Response.Redirect(CSitemap.ProductTypes(New CPagingInfo(0, pageNumber - 1, sortBy, descending)))
    End Sub
#End Region

End Class
